﻿Public Class frmSelectLlamadas

    Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub btCancelar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btCancelar.Click
        Me.Close()
    End Sub

    Private Sub frmSelectLlamadas_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        CargarEmpresas(cbo_empresa)
        cbo_empresa.Text = "Seleccionar..."
    End Sub

    Private Sub btMostrar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btMostrar.Click
        If (cbo_empresa.Text = "Seleccionar...") Then
            MsgBox("Seleccione una Empresa para generar el reporte.")
        Else
            frmExportExcel.ShowDialog()
        End If
    End Sub

End Class